home *** CD-ROM | disk | FTP | other *** search
/ Network Supervisor's Toolkit / Network Supervisor's Toolkit.iso / tools / lu62 / port / actscree.h < prev    next >
Text File  |  1996-07-10  |  2KB  |  70 lines
  1. /* k 0224       23/09/91        *//* ebss */
  2. #include <ebss.h>               /* @0224 */
  3. #include <pconio.h>    /* @0253 */
  4.  actscreen(scr,sav)            /* @0184 */
  5.  char scr;                /* @0184 */
  6.  char sav;                /* @0184 */
  7.                   {
  8.    struct segprf *b1,*b2;
  9.    if (nps->ls[(short)scr-49].flag & LS_ACT) {            /* @0031 */
  10.      pmsgop(25);         /* Screen is already active */
  11.      return;                            /* @0031 */
  12.                          }            /* @0031 */
  13.    if (sav=='Y'|| sav=='y')  {                   /* @0031 */
  14. #if (OS_TYPE==0)        /* @0208 */
  15.   nps->ls[(short)scr-49].sbuf.fhalf=Bufnps+5760*((short)scr-49); /* @0208 */
  16. #else                /* @0208 */
  17.      if ((b1=
  18. #if (RESIDENT==1)
  19.      preqseg
  20. #else
  21.    Res_preqseg
  22. #endif
  23.      (2020))==0) {
  24.        pmsgop(27);        /* NO buffer to activate screen
  25.                    with save option */
  26.        return;
  27.                 }
  28.      if ((b2=
  29. #if (RESIDENT==1)
  30.      preqseg
  31. #else
  32.    Res_preqseg
  33. #endif
  34.      (2020))==0) {
  35.        pmsgop(27);
  36. #if (RESIDENT==1)
  37.      Res_prelseg(b1);
  38. #else
  39.        prelseg(b1);
  40. #endif
  41.        return;
  42.                 }
  43.      b1->link=b2;
  44.      b2->link=0;
  45. #endif            /* @0208 */
  46.      nps->ls[(short)scr-49].flag |= SAVEB;             /* @0031 */
  47. #if (OS_TYPE!=0)        /* @0208 */
  48.      nps->ls[(short)scr-49].sbuf.fhalf=(char *)b1;              /* @0031 */
  49.      nps->ls[(short)scr-49].sbuf.shalf=(char *)b2;              /* @0031 */
  50. #endif                /* @0208 */
  51.               }
  52.    nps->ls[(short)scr-49].flag |= LS_ACT;               /* @0031 */
  53.    if (vt_flag & VT_MODE)                /* @0087 */
  54.  {                                                      /* @0087 */
  55.    newwindow();
  56.    gotoxy(4+((short)scr-49)*3,1);          /* @0031 */     /* @0032 */
  57.    putch(scr);                      /* @0110 */                   /* 0017 */
  58.    oldwindow();
  59.  }                            /* @0087 */
  60.    else                            /* @0087 */
  61.      save25[2*(3+((short)scr-49)*3)]=scr;    /* @0110 *//* @0087 */
  62.     }
  63. #if (RESIDENT==0)
  64. Res_preqseg() {
  65. p:goto p;
  66. }
  67. Res_prelseg() {
  68. p:goto p;
  69. }
  70. #endif